Значения заданных переменных а,b, с перераспределить таким образом, что a, b, c станут, соответственно, наибольшим, средним и наименьшим значениями — QBasic(Бейсик)

INPUT "vvedite a, b, c: ", a, b, c
IF b > a THEN SWAP a, b
IF c > a THEN SWAP a, c
IF c > b THEN SWAP b, c
PRINT a, b, c

Тестирование выполнено в программе QB64 ( Скачать )